home *** CD-ROM | disk | FTP | other *** search
/ Aminet 3 / Aminet 3 - July 1994.iso / Aminet / misc / emu / APCNames12a.lha / APCNames / Sources.Amiga / APCNames.c next >
Encoding:
C/C++ Source or Header  |  1993-12-07  |  11.1 KB  |  388 lines
  1. /* $Revision Header *** Header built automatically - do not edit! ***********
  2.  *
  3.  *    (C) Copyright 1993 by Rainer Koppler
  4.  *
  5.  *    Name .....: APCNames.c
  6.  *    Created ..: Friday 5-Mar-93 19:31:41
  7.  *    Revision .: 6
  8.  *
  9.  *    Date        Author                 Comment
  10.  *    =========   ====================   ====================
  11.  *    07-Dec-93   Rainer Koppler         enhanced encoding of long names
  12.  *    23-Sep-93   Rainer Koppler         "S:APCNames.types" support added
  13.  *    09-Sep-93   Rainer Koppler         Symantec C++ support added
  14.  *    15-Jul-93   Rainer Koppler         MS-Word support added
  15.  *    23-Mar-93   Rainer Koppler         Bug fix: multiple periods handled
  16.  *      17-Mar-93   Rainer Koppler         Bug fix: disk entry only at root level
  17.  *    05-Mar-93   Rainer Koppler         Created this file!
  18.  *
  19.  ****************************************************************************
  20.  *
  21.  *      Utility for creating original file names for MS-DOS file names
  22.  *      from the APCINFO.DAT file created by the Mac tool AccessPC.
  23.  *
  24.  * $Revision Header ********************************************************/
  25.  
  26. #include "APCNames.h"
  27. #include "Types.h"
  28. #include <stdio.h>
  29. #include <stdlib.h>
  30. #include <string.h>
  31. #include <ctype.h>
  32.  
  33. #ifndef AMIGA
  34. extern int strnicmp (char *, char *, int);
  35. extern int stricmp (char *, char *);
  36. #endif
  37.  
  38. /*-------------------------------------------------------------------
  39. **  SetPattern/NextEntry are my own Amiga-specific pattern-matching
  40. **   routines. I suppose there is no need for them for UN*X... :^)
  41. **-------------------------------------------------------------------
  42. */
  43.  
  44. #ifdef AMIGA
  45. #include "Wildcard.h"
  46. #else
  47. static char *fnDummy;
  48. static void  SetPattern (char *fileName)
  49. { 
  50.   fnDummy = fileName;
  51. }
  52. static char *NextEntry (void)
  53. {  
  54.   char *fn = fnDummy;
  55.   fnDummy = NULL;
  56.   return fn;
  57. }
  58. #endif
  59.  
  60.  
  61. /*-------------------------------------------------------------------
  62. **  Each APCINFO.DAT file consists of several records denoting
  63. **  disk or file entries. Each record has a length of 80 bytes.
  64. **  The first record always denotes a disk entry, all subsequent
  65. **  records are file entries.
  66. **  After each 12 entries there are 64 bytes with undefined contents.
  67. **-------------------------------------------------------------------
  68. */
  69.  
  70. #define APC_ENTRY_SIZE  sizeof(union APCEntry)
  71. #define APC_PAD_SIZE    0x40
  72.  
  73. union APCEntry {
  74.  
  75.   UBYTE    ae_Data[80];
  76.  
  77.   struct DiskEntry {
  78.     UBYTE  de_Length;        /*length of disk name*/
  79.     UBYTE  de_Pad[79];       /*disk name and other data*/
  80.   } de;
  81.  
  82.   struct FileEntry {
  83.     UBYTE  fe_Length;        /*length of file name*/
  84.     char   fe_Name[31];      /*file name characters*/
  85.     ULONG  fe_Type;          /*Macintosh type ID*/
  86.     ULONG  fe_Creator;       /*Macintosh creator ID*/
  87.     UBYTE  fe_Pad1[23];      /*undocumented data*/
  88.     UBYTE  fe_Flags;         /*file visible <=> 0 (?)*/
  89.     char   fe_MSDOSName[8];  /*file name padded with blanks*/
  90.     char   fe_MSDOSExt[3];   /*extension padded with blanks*/
  91.     UBYTE  fe_Pad2[5];       /*always zero*/
  92.   } fe;
  93.  
  94. };
  95.  
  96.  
  97. /*----------------------------- global data ---------------------------------*/
  98.  
  99. static FILE *apcInfoDat;
  100. static union APCEntry *entry;
  101. static char lngName[32],shtName[13],*sptr;
  102.  
  103. static const char versionStr[] = {
  104.   "\0$VER: APCNames 1.2 by Rainer Koppler (7.12.93)"
  105. };
  106.  
  107.  
  108. /*---------------- disk entry for empty disk (view by name) -----------------*/
  109.  
  110. static ULONG de_Empty[] = {
  111.   0x0A526169, 0x6E657220, 0x31001600, 0x0002A002,
  112.   0x02000000, 0x00000000, 0x00000000, 0x00000001,
  113.   0x002E0008, 0x00EA019C, 0x01000070, 0x02480200,
  114.   0xFFF8FFF0, 0x00000000, 0x00008000, 0x00000002,
  115.   0x7FA95F49, 0x6E736967, 0x6E696100, 0x00000000
  116. };
  117.  
  118. /*------------------------- universal file entry ----------------------------*/
  119.  
  120. static ULONG fe_Default[] = {
  121.   0x00000000, 0x00000000, 0x00000000, 0x00000000,
  122.   0x000D0D90, 0x0000000F, 0x000000E5, 0x000D0D90,
  123.   0x00000000, 0x00000000, 0x0100FFFF, 0xFFFF0000, /* TYPE, CREATOR, ... */
  124.   0x00000000, 0x00000000, 0x00000000, 0x00000000,
  125.   0x00000000, 0x00000000, 0x00000000, 0x00000000
  126. };
  127.  
  128.  
  129. /*---------------------------------------------------------------------------*/
  130.  
  131. static void Pas2CStr (UBYTE *ps, char *cs)
  132. {
  133.  UBYTE len = *ps;
  134.  
  135.  strncpy(cs,(char *)ps+1,len);
  136.  *(cs+len) = '\0';
  137. }
  138.  
  139. /*---------------------------------------------------------------------------*/
  140.  
  141. static void C2PasStr (char *cs, UBYTE *ps)
  142. {
  143.  UBYTE len = strlen(cs);
  144.  
  145.  strcpy((char *)ps+1,cs);
  146.  *ps = len;
  147. }
  148.  
  149. /*---------------------------------------------------------------------------*/
  150.  
  151. static void Long2Short (char *fileName)
  152. {
  153.   char *dotPtr,*lptr,ch,orgCh;
  154.   struct TCInfo *tci;
  155.   int i,stubIdx,state;
  156.   union APCEntry *tstEntry;
  157.   LONG fp;
  158.  
  159. /*--- copy entry template to "entry" and insert TYPE/CREATOR ---*/
  160.   memcpy(entry,fe_Default,APC_ENTRY_SIZE);
  161.   tci = TCInfoFor(fileName);
  162.   entry->fe.fe_Type = tci->tci_Type;
  163.   entry->fe.fe_Creator =tci->tci_Creator;
  164. /*--- insert original file name ---*/
  165.   C2PasStr(fileName,(UBYTE *)entry);
  166. /*--- 1. encode original file name to "shtName" (MS-DOS format) ---*/
  167.   for(i=0,sptr=shtName,lptr=fileName; i<8 && *lptr!='\0' && *lptr!='.';
  168.       sptr++,lptr++,i++)
  169.     *sptr = toupper(*lptr);
  170.   stubIdx = lptr-fileName; /* where the stub character would be placed */
  171.   if(stubIdx == 8) stubIdx--;
  172.   dotPtr = strchr(fileName,'.');
  173.   if(dotPtr) {
  174.     for(; i<8; i++,sptr++) *sptr = ' ';
  175.     for(lptr=dotPtr+1; i<11 && *lptr!='\0'; lptr++)
  176.       if(*lptr != '.') {
  177.         *sptr = toupper(*lptr);
  178.         sptr++;
  179.         i++;
  180.       }
  181.   }
  182.   for(; i<11; i++,sptr++) *sptr = ' ';
  183. /*--- 2. seek existing entry with same MS-DOS name & modify new name if so ---*/
  184.   fseek(apcInfoDat,0L,SEEK_SET);
  185.   state = 0;
  186.   orgCh = shtName[stubIdx];
  187.   if(!(tstEntry=malloc(APC_ENTRY_SIZE))) {
  188.     printf("*** No memory for test entry block.\n");
  189.     exit(EXIT_FAILURE);
  190.   }
  191.   while(fread(tstEntry,APC_ENTRY_SIZE,1,apcInfoDat) > 0) {
  192.     if(!strncmp(tstEntry->fe.fe_MSDOSName,shtName,11)) {
  193.       do {
  194.         if(state == 0)
  195.           ch = '&';
  196.         else if(state>=1 && state<=10)
  197.           ch = '0'+state-1;
  198.         else if(state>=11 && state<=36)
  199.           ch = 'A'+state-11;
  200.         else {
  201.           printf("*** Encoding possibilities exceeded. Try to rename some files.\n");
  202.           exit(EXIT_FAILURE);
  203.         }
  204.         state++;
  205.       } while(ch == orgCh);
  206.       shtName[stubIdx] = ch;
  207.     }
  208.     fp = ftell(apcInfoDat);
  209.     if(fp % 0x0400 == 0x03C0)
  210.       fread(tstEntry,APC_PAD_SIZE,1,apcInfoDat);
  211.   }
  212.   free(tstEntry);
  213. /*--- 3. insert MS-DOS file name into entry & prepare "shtName" for rename ---*/
  214.   for(i=0,sptr=shtName,lptr=entry->fe.fe_MSDOSName; i<11; i++,sptr++,lptr++) 
  215.     *lptr = *sptr;
  216.   for(i=0,sptr=shtName,lptr=entry->fe.fe_MSDOSName; i<11; i++) {
  217.     if(i==8 && dotPtr && *(dotPtr+1)) {
  218.       *sptr = '.';
  219.       sptr++;
  220.     }
  221.     if(*lptr != ' ') {
  222.       *sptr = *lptr;
  223.       sptr++;
  224.     }
  225.     lptr++;
  226.   }
  227.   *sptr = 0;
  228. }
  229.  
  230. /*---------------------------------------------------------------------------*/
  231.  
  232. static void Short2Long (void)
  233. {
  234.   int i;
  235.   char *ptr;
  236.  
  237.   if(entry->fe.fe_Length > 31) {
  238.     *shtName = '\0'; *lngName = '\0';
  239.     return;
  240.   }
  241.   Pas2CStr((UBYTE *)entry,lngName);
  242.   sptr = shtName;
  243.   ptr = entry->fe.fe_MSDOSName;
  244.   for(i=0; i<8 && *ptr!=' '; sptr++,ptr++,i++)
  245.     *sptr = *ptr;
  246.   ptr = entry->fe.fe_MSDOSExt;
  247.   if(*ptr != ' ') {
  248.     *sptr = '.';
  249.     sptr++;
  250.   }
  251.   for(i=0; i<3 && *ptr!=' '; sptr++,ptr++,i++)
  252.     *sptr=*ptr;
  253.   *sptr = '\0';
  254. }
  255.  
  256. /*---------------------------------------------------------------------------*/
  257.  
  258. static BOOL EntryExistsFor (char *fileName)
  259. {
  260.   BOOL fnd = FALSE;
  261.   LONG fp;
  262.  
  263.   fseek(apcInfoDat,0L,SEEK_SET);
  264.   while(!fnd && fread(entry,APC_ENTRY_SIZE,1,apcInfoDat) > 0) {
  265.     Pas2CStr((UBYTE *)entry,lngName);
  266.     if(!(fnd = !stricmp(fileName,lngName))) {
  267.       fp = ftell(apcInfoDat);
  268.       if(fp % 0x0400 == 0x03C0)
  269.         fread(entry,APC_PAD_SIZE,1,apcInfoDat);
  270.     }
  271.   }
  272.   return(fnd);
  273. }
  274.  
  275. /*---------------------------------------------------------------------------*/
  276.  
  277. main (int argc, char *argv[])
  278. {
  279.   int cnt,fnCnt,total;
  280.   char *fn;
  281.   LONG fp;
  282.  
  283.   printf("\n»»APCNames«« - AccessPC renaming utility v1.2\n\n");
  284.  
  285.   if(--argc > 0 && strncmp(argv[1],"-c",2)) {
  286.     printf("USAGE: %s [ -c[<config>] <file> { <file> }]\n",argv[0]);
  287.     exit(EXIT_FAILURE);
  288.   }
  289.  
  290.   if(!(entry=malloc(APC_ENTRY_SIZE))) {
  291.     printf("*** No memory for entry block.\n");
  292.     exit(EXIT_FAILURE);
  293.   }
  294.  
  295.   fnCnt = 0;
  296.   total = 0;
  297.  
  298. /*--- transform long names to short names and create/update APCINFO file ---*/
  299.   if(argc > 0) {
  300.     if(!(apcInfoDat=fopen("APCINFO.DAT","a+"))) {
  301.       printf("*** Cannot open APCINFO.DAT for update.\n");
  302.       exit(EXIT_FAILURE);
  303.     }
  304.   /*--- if new file then create (empty) disk entry at beginning ---*/
  305.     fseek(apcInfoDat,0L,SEEK_END);
  306.     if(ftell(apcInfoDat) == 0)
  307.       fwrite(de_Empty,1,APC_ENTRY_SIZE,apcInfoDat);
  308.   /*--- configuration file specified ? ---*/
  309.     if(strlen(argv[1]) > 2)
  310.       ReadTypes(argv[1]+2);
  311.     else
  312.       ReadTypes(DEFAULT_CONFIG);
  313.   /*--- process file patterns ---*/
  314.     for(cnt=2; cnt<=argc; cnt++) {
  315.       SetPattern(argv[cnt]);
  316.       while(fn = NextEntry()) {
  317.       /*--- lookup APCINFO.DAT for existing entry ---*/
  318.         if(!EntryExistsFor(fn)) {
  319.           fseek(apcInfoDat,0L,SEEK_END);
  320.           fp = ftell(apcInfoDat);
  321.           if(fp % 0x0400 == 0x03C0) {
  322.             memset(entry,0,APC_PAD_SIZE);
  323.             fwrite(entry,APC_PAD_SIZE,1,apcInfoDat);
  324.           }
  325.           Long2Short(fn);
  326.           fseek(apcInfoDat,0L,SEEK_END);
  327.           fwrite(entry,APC_ENTRY_SIZE,1,apcInfoDat);
  328.           printf("renaming \"%s\" to \"%s\"...",fn,shtName);
  329.           total++;
  330.           if(!rename(fn,shtName)) {
  331.             printf("ok\n");
  332.             fnCnt++;
  333.           }
  334.           else
  335.             printf("failed\n");
  336.         }
  337.         else
  338.           printf("\"%s\" already exists - skipped.\n",fn); 
  339.       }
  340.     }
  341.     fclose(apcInfoDat);
  342.     printf("\n%d file(s) of %d renamed successfully.\n",fnCnt,total);
  343.   }
  344. /*--- get contents of APCINFO file and transform short names to long names ---*/
  345.   else {
  346.     if(!(apcInfoDat=fopen("APCINFO.DAT","r"))) {
  347.       printf("*** Cannot open APCINFO.DAT for input.\n");
  348.       exit(EXIT_FAILURE);
  349.     }
  350.     cnt = 0;
  351.     while(fread(entry,APC_ENTRY_SIZE,1,apcInfoDat) > 0) {
  352.     /*--- D I S K  E N T R Y ---*/
  353.       if(entry->fe.fe_MSDOSName[1] == '©') {
  354.         Pas2CStr((UBYTE *)entry,lngName);
  355.         printf("Disk name: %s\n\n",lngName);
  356.       }
  357.     /*--- F I L E  E N T R Y ---*/
  358.       else {
  359.       /*--- create MS-DOS name and original name of entry data ---*/
  360.         Short2Long();
  361.       /*--- rename only if valid file entry ---*/
  362.         if(entry->fe.fe_Type == TYPE_TEXT || entry->fe.fe_Type == TYPE_WDBN) {
  363.           printf("renaming \"%s\" to \"%s\"...",shtName,lngName);
  364.           total++;
  365.           if(!rename(shtName,lngName)) {
  366.             printf("ok\n");
  367.             fnCnt++;
  368.           }
  369.           else
  370.             printf("failed\n");
  371.         }
  372.         else
  373.           printf("ignoring \"%s\" (\"%s\")\n",shtName,lngName);
  374.       }
  375.       cnt++;
  376.     /*--- skip 64 bytes after each 12 records ---*/
  377.       if(cnt == 12) {
  378.         fread(entry,APC_PAD_SIZE,1,apcInfoDat);
  379.         cnt = 0;
  380.       }
  381.     }
  382.     fclose(apcInfoDat);
  383.     printf("\n%d file(s) of %d renamed successfully.\n",fnCnt,total);
  384.   }
  385.   FreeTypes();
  386.   free(entry);
  387. }
  388.